//ABLMSCA   JOB (ABLMSC,B095SC),'10MIS-BLAKE X3659',
//        CLASS=T,MSGCLASS=T,NOTIFY=ABLMSC
//**                                                                    00000015
//JOBLIB      DD DSN=J092SC.PRODLIB.LOAD,DISP=SHR STDS 7/83
//**
//*   ++++++++++++++++++++++++++++++++++++++++++++++++++++++            00030000
//*   +  RECOVER BACKUP COPY OF PDS FROM TAPE              +            00031000
//*   ++++++++++++++++++++++++++++++++++++++++++++++++++++++            00030000
//**
//STEP010     EXEC PGM=IEBCOPY,REGION=6144K
//TAPE01      DD DSN=J231SC.YEFY93.FINTBL,DISP=SHR
//DISK01      DD DSN=J231SC.FDAT.YEFY93.FINTBL,
//            DISP=(NEW,CATLG,DELETE),
//            UNIT=DISK,
//            SPACE=(CYL,(50,25,1000)),
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=6400)
//SYSUT3      DD DISP=(NEW,DELETE),UNIT=DISK,
//            SPACE=(TRK,(10,10))
//SYSUT4      DD DISP=(NEW,DELETE),UNIT=DISK,
//            SPACE=(TRK,(10,10))
//SYSPRINT    DD SYSOUT=*
//SYSIN       DD *
  COPY INDD=TAPE01,OUTDD=DISK01
//**
